home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48_2 / btype < prev    next >
Internet Message Format  |  1995-03-31  |  2KB
  1. From comp.sys.handhelds Sun Jun  9 13:21:39 1991
  2. Path: seq!ecsgate!mcnc!taco!lll-winken!elroy.jpl.nasa.gov!sdd.hp.com!hp-pcd!hpcvra.cv.hp.com!rnews!hpcvbbs!akcs.joehorn
  3. From: akcs.joehorn@hpcvbbs.UUCP (Joseph K. Horn)
  4. Newsgroups: comp.sys.handhelds
  5. Subject: HP 48 BYTES/TYPE Utility
  6. Keywords: hp 48 bytes type btype
  7. Message-ID: <284c81c6:3361comp.sys.handhelds@hpcvbbs.UUCP>
  8. Date: 5 Jun 91 06:40:07 GMT
  9. Lines: 33
  10.  
  11.  
  12.         HP 48 BYTES/TYPE Utility
  13.  
  14. Here's a little program I keep assigned to a key.  I call it
  15. BTYPE, because it's a cross between the BYTES and TYPE commands.
  16. It identifies IN ENGLISH the object type of whatever's in level 1,
  17. unless it's a defined global name, in which case it identifies the
  18. object type of ITS CONTENTS.  (If not defined, it just says "Global
  19. Name").  This is tagged onto its BYTE COUNT.  To make it useful for
  20. quick keyboard use, it doesn't eat the argument, but lifts it to
  21. level 2, so that you can just press backarrow to resume whatever
  22. you were doing before pressing BTYPE.
  23.  
  24. This is another example of how sweet "system RPL" can be.
  25.  
  26. Checksum of BTYPE: # 3D96h; 42.5 bytes.
  27.  
  28. ASC-> the following:
  29. --------------------------
  30. %%HP:T(1);
  31. "D9D202BA819BC2653026CB916D9D20B7970CB916B9F0688130B2130CF1A1B9F0
  32. 632230BBC5118E50B213069D3"
  33. --------------------------
  34.  
  35. Or UUdecode the following:
  36. **************************
  37. begin 600 btype
  38. M2%!(4#0X+46=+2"K&+DL5@-BO!G6V0)[><";89L/AA@#*S'`'QJ;#S8B`[M<
  39. &$>@%*S$`
  40. `
  41. end
  42. **************************
  43.  
  44. --  Joseph K Horn  --  Peripheral Vision, Ltd.  --
  45.  
  46.